home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 5 (Internal Edition) / Apple R&P Lib Internal v5.0.iso / 6-Developer Demos / Developer Demos-Ed. / Macintosh School® CD-ROM Demo / Macintosh SchoolÆ CD-ROM Demo / background_52392.txt < prev    next >
Text File  |  1990-08-14  |  3KB  |  134 lines
  1. -- background: 52392 from stack: in
  2. -- bmap block id: 52835
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: Student Details
  6. ----- HyperTalk script -----
  7. on openBackground
  8.   global interactiveDemo
  9.   installMenuBar 1170,1171,1172,1173,1174,1175
  10.   if interactiveDemo then
  11.     show card field "Instructions"
  12.   end if
  13.   put false into interactiveDemo
  14. end openBackground
  15.  
  16. on doMenu menuItem
  17.   if menuItem contains "About" then
  18.     lock screen
  19.     restoreMenuBar
  20.     go to card short name of this background of background "About"
  21.     unlock screen with zoom close
  22.   else if menuItem is "Home" then
  23.     restoreMenuBar
  24.     go home
  25.   else if menuItem contains "Quit" then
  26.     lock screen
  27.     restoreMenuBar false
  28.     go to card "Mac School¬Æ Shell"
  29.     unlock screen with zoom close
  30.   else if menuItem is "New Student‚Ķ" then
  31.     push card
  32.     go to background "Student Details tabs"
  33.   else if (menuItem is "Open‚Ķ" OR menuItem is "Close" OR menuItem is "Import Students‚Ķ" OR menuItem is "Page Setup‚Ķ" OR menuItem is "Undo" OR menuItem is "Cut" OR menuItem is "Copy" OR menuItem is "Paste" OR menuItem is "Clear") then -- do nothing
  34.   end if
  35. end doMenu
  36.  
  37.  
  38. -- part 1 (field)
  39. -- low flags: 01
  40. -- high flags: 0000
  41. -- rect: left=93 top=47 right=61 bottom=127
  42. -- title width / last selected line: 0
  43. -- icon id / first selected line: 0 / 0
  44. -- text alignment: 0
  45. -- font id: 3
  46. -- text size: 9
  47. -- style flags: 0
  48. -- line height: 12
  49. -- part name: Active Students
  50.  
  51.  
  52. -- part 2 (field)
  53. -- low flags: 01
  54. -- high flags: 0000
  55. -- rect: left=420 top=47 right=61 bottom=497
  56. -- title width / last selected line: 0
  57. -- icon id / first selected line: 0 / 0
  58. -- text alignment: 65535
  59. -- font id: 3
  60. -- text size: 9
  61. -- style flags: 0
  62. -- line height: 12
  63. -- part name: Date
  64.  
  65.  
  66. -- part 3 (field)
  67. -- low flags: 01
  68. -- high flags: 0007
  69. -- rect: left=105 top=77 right=295 bottom=498
  70. -- title width / last selected line: 0
  71. -- icon id / first selected line: 0 / 0
  72. -- text alignment: 0
  73. -- font id: 3
  74. -- text size: 9
  75. -- style flags: 0
  76. -- line height: 12
  77. -- part name: Number
  78.  
  79.  
  80. -- part 4 (field)
  81. -- low flags: 01
  82. -- high flags: 0007
  83. -- rect: left=153 top=77 right=295 bottom=498
  84. -- title width / last selected line: 0
  85. -- icon id / first selected line: 0 / 0
  86. -- text alignment: 0
  87. -- font id: 3
  88. -- text size: 9
  89. -- style flags: 0
  90. -- line height: 12
  91. -- part name: Name
  92.  
  93.  
  94. -- part 5 (field)
  95. -- low flags: 01
  96. -- high flags: 0007
  97. -- rect: left=389 top=77 right=295 bottom=498
  98. -- title width / last selected line: 0
  99. -- icon id / first selected line: 0 / 0
  100. -- text alignment: 0
  101. -- font id: 3
  102. -- text size: 9
  103. -- style flags: 0
  104. -- line height: 12
  105. -- part name: Grade
  106.  
  107.  
  108. -- part 6 (field)
  109. -- low flags: 01
  110. -- high flags: 0007
  111. -- rect: left=417 top=77 right=295 bottom=498
  112. -- title width / last selected line: 0
  113. -- icon id / first selected line: 0 / 0
  114. -- text alignment: 0
  115. -- font id: 3
  116. -- text size: 9
  117. -- style flags: 0
  118. -- line height: 12
  119. -- part name: Status
  120.  
  121.  
  122. -- part 7 (field)
  123. -- low flags: 01
  124. -- high flags: 0007
  125. -- rect: left=459 top=77 right=295 bottom=498
  126. -- title width / last selected line: 0
  127. -- icon id / first selected line: 0 / 0
  128. -- text alignment: 0
  129. -- font id: 3
  130. -- text size: 9
  131. -- style flags: 0
  132. -- line height: 12
  133. -- part name: Select
  134.